OT: Volume
Otázka od: Ondrej Skipala
31. 8. 2002 19:33
Nevite nekdo jakym zpusobem se v programu ovlada hlasitost samotna a
hlasitost MIDI souboru a Wavu? nejakym prikazem nebo komponentou?
Dik za
odpoved.
______________________________________________________________________
Reklama:
Přijďte se podívat na 10. ročník Mezinárodního festivalu DIVADLO: divadla z
osmi zemí světa, pouliční performance, site specific theatre, výstavy,
workshop, tance buto a další. http://festival.divadlo.cz
Odpovedá: Petr Vones
1. 9. 2002 14:46
From: "Ondrej Skipala" <OSkip@seznam.cz>
> Nevite nekdo jakym zpusobem se v programu ovlada hlasitost samotna a
> hlasitost MIDI souboru a Wavu? nejakym prikazem nebo komponentou?
uses
MMSystem, JclMultimedia;
procedure TForm1.Button1Click(Sender: TObject);
var
Mixer: TJclMixer;
begin
Mixer := TJclMixer.Create;
try
// MIDI
Mixer.LineVolume[MIXERLINE_COMPONENTTYPE_SRC_SYNTHESIZER] := $8000;
// Wave
Mixer.LineVolume[MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT] := $8000;
// Volume
Mixer.SpeakersVolume := $8000;
finally
Mixer.Free;
end;
end;
JclMultimedia: http://delphi-jedi.org/CODELIBJCL
Petr Vones
Odpovedá: Obermaier Petr Ing.
1. 9. 2002 17:06
> Od: Petr Vones [SMTP:pvones@mbox.vol.cz]
> JclMultimedia: http://delphi-jedi.org/CODELIBJCL
>
>
Docela by se mi hodilo, kdyby slo prehodil left a right kanal z jakehokoliv
vstupu, ale to asi nejde tak jednoduse jako ovladani mixeru? Zatim jsem to
zkousel jen jako capture s bufferingem s prehozenym prehravanim kanalu.
Ober
Odpovedá: Petr Vones
1. 9. 2002 19:48
From: "Obermaier Petr Ing." <Obermaier@mail.sdas.cz>
> Docela by se mi hodilo, kdyby slo prehodil left a right kanal z jakehokoliv
> vstupu, ale to asi nejde tak jednoduse jako ovladani mixeru? Zatim jsem to
To asi opravdu ne. Co to treba prohodit hardwarove 
Petr Vones